home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Gold Medal Software 3
/
Gold Medal Software - Volume 3 (Gold Medal) (1994).iso
/
prog
/
cenvi29.arj
/
DISKFREE.CMD
< prev
next >
Wrap
OS/2 REXX Batch file
|
1994-03-08
|
897b
|
24 lines
@echo OFF
REM ************************************************************************
REM *** DiskFree.cmd - Display how much disk space is available on a ***
REM *** ver.1 drive, and set the DISK_FREE environment variable ***
REM *** to that amount ***
REM ************************************************************************
if "%1" == "" GOTO SHOW_HOW
if not "%2"=="" GOTO SHOW_HOW
dir %1:\ | find "bytes free" | CEnvi DISK_FREE = atol(gets()) / 1024; ESet("TempSet.cmd")
call TempSet.cmd
del TempSet.cmd
ECHO DRIVE %1 HAS %DISK_FREE% K-BYTES FREE
GOTO FINI
:SHOW_HOW
ECHO DiskFree.cmd - Show how much disk space is available on a drive, in kilobytes,
ECHO and set DISK_FREE environment variable to that size
ECHO USAGE: DiskFree DriveLetter
ECHO Example: DiskFree C
GOTO FINI
:FINI